arcplot
disp 1040
legendgeol
mape legendgeol
mapunits cm
mapscale 1
lineset pd24a.lin
arclines legendgeol 1
shadeset ver256.shd
polygonshade legendgeol fmatn prcolor.lut
shadeset plotter
polygonshade legendgeol fmatn prshade.lut
annotext legendgeol
mapshift .65 0
textsize .1
polygontext legendgeol fmatn
q
&watch &off